! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Stoichiometric Data Structures File
! 
! Generated by KPP-2.2.3 symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : aromatics_kpp_StoichiomSP.f90
! Time                 : Thu Dec 17 19:38:34 2020
! Working directory    : /n/home08/kbates/Aromatics/MOZART
! Equation file        : aromatics_kpp.kpp
! Output root filename : aromatics_kpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE aromatics_kpp_StoichiomSP

  USE aromatics_kpp_Precision
  PUBLIC
  SAVE


! Row-compressed sparse data for the Jacobian of reaction products JVRP

  INTEGER, PARAMETER, DIMENSION(360) :: CROW_JVRP_0 = (/ &
       1,  2,  4,  6,  8, 10, 11, 13, 15, 16, 18, 20, &
      22, 23, 25, 27, 29, 31, 33, 34, 36, 38, 40, 42, &
      44, 46, 48, 50, 52, 53, 54, 55, 56, 57, 58, 59, &
      60, 61, 62, 63, 64, 65, 67, 69, 71, 72, 73, 75, &
      76, 78, 80, 82, 84, 86, 88, 89, 90, 91, 92, 93, &
      95, 97, 99,100,101,103,105,107,108,110,112,114, &
     116,118,120,121,122,123,124,125,127,129,131,133, &
     135,137,139,141,143,145,147,149,151,153,155,157, &
     159,161,163,164,166,168,170,172,174,176,178,180, &
     182,184,186,188,190,192,193,195,197,198,200,202, &
     204,206,208,210,212,214,216,218,220,222,224,226, &
     228,230,232,234,235,237,239,241,243,245,247,248, &
     250,252,253,254,256,258,260,262,264,266,268,270, &
     272,274,276,278,280,282,284,286,288,290,292,294, &
     296,298,300,302,304,305,307,309,311,313,315,317, &
     319,321,323,324,325,327,329,331,333,335,337,339, &
     341,343,345,347,349,351,353,355,357,359,361,363, &
     365,367,369,371,373,375,377,379,381,383,385,387, &
     389,391,393,395,397,399,401,403,405,407,409,411, &
     413,415,417,419,421,423,425,427,429,431,433,435, &
     437,439,441,443,445,447,449,451,453,455,457,459, &
     461,462,464,466,468,470,472,474,475,477,479,481, &
     483,485,487,489,491,493,495,497,499,501,503,505, &
     507,509,511,513,515,517,519,521,523,525,527,529, &
     531,533,535,537,539,541,543,545,547,549,551,553, &
     555,557,559,561,563,565,567,569,571,572,574,576, &
     578,580,582,584,586,588,590,592,594,596,598,600, &
     601,602,604,606,608,609,610,612,614,616,617,619, &
     621,623,624,626,628,630,631,632,634,636,638,639, &
     640,642,644,646,647,648,650,652,654,656,658,660 /)
  INTEGER, PARAMETER, DIMENSION(285) :: CROW_JVRP_1 = (/ &
     661,662,663,664,665,666,667,668,669,670,671,672, &
     673,674,675,676,677,678,679,680,681,682,683,684, &
     685,686,687,688,689,690,691,692,693,694,695,696, &
     697,698,699,700,701,702,703,704,705,706,707,709, &
     711,713,715,717,719,721,723,725,727,729,731,733, &
     735,737,739,741,743,745,747,749,751,753,755,757, &
     759,761,763,765,767,769,771,773,775,777,778,780, &
     782,784,786,788,790,792,793,794,795,796,797,798, &
     799,800,801,802,803,804,805,805,805,805,805,805, &
     805,805,805,806,807,808,809,810,811,812,813,814, &
     815,816,817,818,819,820,821,822,823,824,825,826, &
     827,828,829,830,831,832,833,834,835,836,837,838, &
     839,840,841,842,843,844,845,846,847,848,849,850, &
     851,852,853,854,855,856,857,858,859,860,861,862, &
     863,864,865,866,867,868,869,870,871,872,873,874, &
     875,876,877,878,879,880,881,882,883,884,885,886, &
     887,888,889,890,891,892,893,894,895,896,897,898, &
     899,900,901,902,903,904,905,906,907,908,909,910, &
     911,912,913,914,915,916,917,918,919,920,921,922, &
     923,924,925,926,927,928,929,930,931,932,933,934, &
     935,936,937,938,939,940,941,942,943,944,945,946, &
     947,948,949,950,951,952,953,954,955,956,957,958, &
     959,960,961,962,963,964,965,966,967,968,969,970, &
     971,972,973,974,975,976,977,978,979 /)
  INTEGER, PARAMETER, DIMENSION(645) :: CROW_JVRP = (/&
    CROW_JVRP_0, CROW_JVRP_1 /)

  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_JVRP_0 = (/ &
      80, 80,175, 80,179, 80,185, 80,185, 31,175,179, &
     175,185,179,179,183,183,185,183,185, 31,175,187, &
      71,187, 86,187,175,188,187,188,188,179,187,185, &
     187,183,187,179,188,185,188, 68,187,183,188, 43, &
     187,135,187,175,175, 86,185,183,183, 43,135,183, &
      35, 68, 35, 68, 49,187,179,181,181,188,181,181, &
     181,185, 58, 61,187, 61,187,162,187,162,183,139, &
     187,186,187, 61,162,162, 58, 58, 32,187,177,179, &
     177,188,177,177,177,181,177,181,177,185, 59, 64, &
     187, 64,187,141,187,141,183,118,187, 50,187, 64, &
     141,141, 59, 59,145,177,157,177,161,177,171,177, &
     173,177,155,177,160,177,152,177,158,177,177,178, &
     177,178,177,182,177,182, 89,187, 89,187, 98,187, &
     172,187,172,183,182,185, 78,179,182, 54,187,161, &
     179, 33,187, 33,187,145,179,157,179, 51,187,171, &
     179,171,179,173,179,155,179,160,179,167,179,167, &
     153,179,164,179,164,147,179,152,179,170,179,170, &
     183,163,183,149,183,149,179,149,185,149,188,140, &
     183,140,179,140,188,140,181,163,175,163,187,137, &
     179,137,188,137,181,170,158,179, 51,183,184,187, &
     134,187,176,187,178,185, 37, 60,185,159,185,124, &
     117,178,179,159,179,176,183,128,187,145,181,157, &
     181,171,188,173,188,155,188,160,188,167,188,153, &
     188,164,188,147,188,152,188,170,188,158,188,180, &
     187,161,181,180,183,171,181,173,181,155,181,160, &
     181,167,181,167,156,181,153,181,164,181,147,181, &
     152,181,170,181,158,181, 85,187,125,187,161,161, &
     161,188,145,188,157,188,182,188,178,188,159,188, &
     133,187,133,175,117,187,124,187,117,175,  4,187, &
     150,187,150,187,133,183,142,187,165,187,142,183 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_JVRP_1 = (/ &
     165,183,132,187,174,187,169,187,168,187,168,187, &
     145,182,157,182,145,182,157,182,132,175,174,175, &
     169,175,132,183,169,183,169,183,178,181,159,181, &
     178,181,159,181,115,187,115,187, 82,187, 70,187, &
      62,187, 63,187, 87,187, 79,187, 81,187,103,187, &
      93,187,104,187,103,187, 93,187,104,187,  6,187, &
      52,187, 53,187, 42,187,138,188,138,179, 97,187, &
      94,187, 99,187, 99,187,110,187,110,187,151,182, &
     151,182,151,181,151,151,188,151,179,151,179, 56, &
     187, 54,183,166,175,182,181,182,181,182,171,182, &
     155,182,160,182,167,182,156,182,153,182,164,182, &
     152,182,173,182,147,182,170,182,158,182,171,182, &
     155,182,160,182,167,182,156,182,153,182,164,182, &
     173,182,147,182,170,182,158,182,152,182,161,182, &
     161,182,178,182,159,182,130,175,154,175,166,187, &
     156,179,156,179,156,188,154,187,130,187,144,179, &
     144,188,148,179,148,188,106,187,136,187,143,187, &
     126,179,126,188,126,185, 36,102,187,123,179,123, &
     179,123,188,100,187,122,179,122,179,122,188,100, &
     175,109,187,146,187,131,186,131,179,131,185,131, &
     131,129,186,129,179,129,185,129,129,116,186,116, &
     179,116,185,116,121,186,121,179,121,185,121,127, &
     186,127,179,127,185,127,127,119,186,119,179,119, &
     185,119,119,120,186,120,179,120,185,120,120, 95, &
     187, 88,187, 92,179, 96,179, 92,188, 96,188, 92, &
      92,172, 78,176,128,128,180,150,142,142,142,165, &
     174,174,174,169,168,115, 82, 70, 62, 63, 87, 81, &
      79,103, 93,104, 97,106, 94, 99,110,184, 56,143, &
     136,130,154,146, 89,124,109, 34, 88,163, 44,187, &
      39,187, 46,187, 90,188, 90,179, 91,188, 91,179 /)
  INTEGER, PARAMETER, DIMENSION(258) :: ICOL_JVRP_2 = (/ &
      73,187, 55,187, 75,188, 67,187, 75,179,101,188, &
     101,179, 57,187, 45,187,113,188,113,179,113,185, &
     108,188,108,179,108,185,114,188,114,179,114,185, &
      76,188, 76,179, 41,187, 83,185, 83,175, 69,187, &
      90,185,107,188,107,179,105,187, 38,112,188,112, &
     179,111,187, 84,188, 84,179, 48,187, 77,187, 73, &
      72, 65, 74, 66, 67, 57, 69, 40, 47,105,111, 77, &
     145,128,134,172, 51,155, 89,152, 39,  1, 54, 33, &
     162,131,119,186,  2,  3, 34,102, 92,123, 85,109, &
     161, 70,120,150,142, 86,168, 95,166,156, 98, 43, &
     135, 68,188, 88, 96, 97, 52, 53, 42,138,  4, 60, &
     170,115,124,163,  5,149,140,137,106,132,130,148, &
     154,144,160,  6,169,143,126,129,147,110,151, 56, &
       7,  8,182,180,127,165,121,100,122,181, 61, 58, &
     164, 99,174,136,116, 35,159,179,185,183,117, 31, &
     175,187, 78, 36,  9,157, 81, 37,158,133, 82,146, &
      10,173,184,171, 87, 62, 63,176,178,167,103, 93, &
     104,125, 79, 44,153, 94, 46, 49, 11, 71, 12,139, &
      80, 13, 14, 15, 16, 32, 50,141,177, 64, 59,118, &
      91, 40,107, 47, 48, 41, 45,112, 73, 72, 65, 74, &
      66, 90, 75, 55, 67,101, 57,113,108,114, 76, 83, &
     105, 38, 84, 77,111, 69 /)
  INTEGER, PARAMETER, DIMENSION(978) :: ICOL_JVRP = (/&
    ICOL_JVRP_0, ICOL_JVRP_1, ICOL_JVRP_2 /)

  INTEGER, PARAMETER, DIMENSION(360) :: IROW_JVRP_0 = (/ &
       1,  2,  2,  3,  3,  4,  4,  5,  5,  6,  7,  7, &
       8,  8,  9, 10, 10, 11, 11, 12, 12, 13, 14, 14, &
      15, 15, 16, 16, 17, 17, 18, 18, 19, 20, 20, 21, &
      21, 22, 22, 23, 23, 24, 24, 25, 25, 26, 26, 27, &
      27, 28, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, &
      38, 39, 40, 41, 42, 42, 43, 43, 44, 44, 45, 46, &
      47, 47, 48, 49, 49, 50, 50, 51, 51, 52, 52, 53, &
      53, 54, 54, 55, 56, 57, 58, 59, 60, 60, 61, 61, &
      62, 62, 63, 64, 65, 65, 66, 66, 67, 67, 68, 69, &
      69, 70, 70, 71, 71, 72, 72, 73, 73, 74, 74, 75, &
      76, 77, 78, 79, 80, 80, 81, 81, 82, 82, 83, 83, &
      84, 84, 85, 85, 86, 86, 87, 87, 88, 88, 89, 89, &
      90, 90, 91, 91, 92, 92, 93, 93, 94, 94, 95, 95, &
      96, 96, 97, 97, 98, 98, 99,100,100,101,101,102, &
     102,103,103,104,104,105,105,106,106,107,107,108, &
     108,109,109,110,110,111,111,112,112,113,113,114, &
     115,115,116,116,117,118,118,119,119,120,120,121, &
     121,122,122,123,123,124,124,125,125,126,126,127, &
     127,128,128,129,129,130,130,131,131,132,132,133, &
     133,134,134,135,135,136,137,137,138,138,139,139, &
     140,140,141,141,142,142,143,144,144,145,145,146, &
     147,148,148,149,149,150,150,151,151,152,152,153, &
     153,154,154,155,155,156,156,157,157,158,158,159, &
     159,160,160,161,161,162,162,163,163,164,164,165, &
     165,166,166,167,167,168,168,169,169,170,170,171, &
     171,172,172,173,174,174,175,175,176,176,177,177, &
     178,178,179,179,180,180,181,181,182,182,183,184, &
     185,185,186,186,187,187,188,188,189,189,190,190, &
     191,191,192,192,193,193,194,194,195,195,196,196, &
     197,197,198,198,199,199,200,200,201,201,202,202 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_JVRP_1 = (/ &
     203,203,204,204,205,205,206,206,207,207,208,208, &
     209,209,210,210,211,211,212,212,213,213,214,214, &
     215,215,216,216,217,217,218,218,219,219,220,220, &
     221,221,222,222,223,223,224,224,225,225,226,226, &
     227,227,228,228,229,229,230,230,231,231,232,232, &
     233,233,234,234,235,235,236,236,237,237,238,238, &
     239,239,240,240,241,241,242,242,243,243,244,244, &
     245,245,246,246,247,247,248,248,249,249,250,250, &
     251,251,252,252,253,254,254,255,255,256,256,257, &
     257,258,258,259,259,260,261,261,262,262,263,263, &
     264,264,265,265,266,266,267,267,268,268,269,269, &
     270,270,271,271,272,272,273,273,274,274,275,275, &
     276,276,277,277,278,278,279,279,280,280,281,281, &
     282,282,283,283,284,284,285,285,286,286,287,287, &
     288,288,289,289,290,290,291,291,292,292,293,293, &
     294,294,295,295,296,296,297,297,298,298,299,299, &
     300,300,301,301,302,302,303,303,304,304,305,305, &
     306,306,307,307,308,308,309,310,310,311,311,312, &
     312,313,313,314,314,315,315,316,316,317,317,318, &
     318,319,319,320,320,321,321,322,322,323,323,324, &
     325,326,326,327,327,328,328,329,330,331,331,332, &
     332,333,333,334,335,335,336,336,337,337,338,339, &
     339,340,340,341,341,342,343,344,344,345,345,346, &
     346,347,348,349,349,350,350,351,351,352,353,354, &
     354,355,355,356,356,357,357,358,358,359,359,360, &
     361,362,363,364,365,366,367,368,369,370,371,372, &
     373,374,375,376,377,378,379,380,381,382,383,384, &
     385,386,387,388,389,390,391,392,393,394,395,396, &
     397,398,399,400,401,402,403,404,405,406,407,407, &
     408,408,409,409,410,410,411,411,412,412,413,413 /)
  INTEGER, PARAMETER, DIMENSION(258) :: IROW_JVRP_2 = (/ &
     414,414,415,415,416,416,417,417,418,418,419,419, &
     420,420,421,421,422,422,423,423,424,424,425,425, &
     426,426,427,427,428,428,429,429,430,430,431,431, &
     432,432,433,433,434,434,435,435,436,436,437,437, &
     438,438,439,439,440,440,441,441,442,443,443,444, &
     444,445,445,446,446,447,447,448,448,449,449,450, &
     451,452,453,454,455,456,457,458,459,460,461,462, &
     471,472,473,474,475,476,477,478,479,480,481,482, &
     483,484,485,486,487,488,489,490,491,492,493,494, &
     495,496,497,498,499,500,501,502,503,504,505,506, &
     507,508,509,510,511,512,513,514,515,516,517,518, &
     519,520,521,522,523,524,525,526,527,528,529,530, &
     531,532,533,534,535,536,537,538,539,540,541,542, &
     543,544,545,546,547,548,549,550,551,552,553,554, &
     555,556,557,558,559,560,561,562,563,564,565,566, &
     567,568,569,570,571,572,573,574,575,576,577,578, &
     579,580,581,582,583,584,585,586,587,588,589,590, &
     591,592,593,594,595,596,597,598,599,600,601,602, &
     603,604,605,606,607,608,609,610,611,612,613,614, &
     615,616,617,618,619,620,621,622,623,624,625,626, &
     627,628,629,630,631,632,633,634,635,636,637,638, &
     639,640,641,642,643,644 /)
  INTEGER, PARAMETER, DIMENSION(978) :: IROW_JVRP = (/&
    IROW_JVRP_0, IROW_JVRP_1, IROW_JVRP_2 /)



!  Stoichiometric Matrix in Compressed Column Sparse Format


  INTEGER, PARAMETER, DIMENSION(360) :: CCOL_STOICM_0 = (/ &
       1,  3,  5,  8, 11, 14, 16, 19, 22, 24, 27, 29, &
      32, 34, 37, 40, 43, 46, 48, 50, 53, 56, 60, 64, &
      67, 70, 74, 77, 80, 82, 84, 86, 89, 91, 94, 97, &
     100,102,105,110,113,116,119,124,127,130,133,136, &
     139,142,144,149,154,158,162,166,170,174,178,181, &
     184,189,192,195,198,204,209,212,215,218,220,224, &
     229,233,237,241,244,247,251,254,261,271,278,292, &
     303,312,321,328,338,343,347,352,356,359,362,366, &
     372,376,379,382,387,390,395,398,401,406,412,415, &
     427,430,436,441,447,458,461,470,479,483,491,496, &
     505,514,519,526,533,537,544,550,556,560,569,577, &
     581,587,591,599,608,613,617,620,624,627,630,633, &
     636,639,642,645,649,657,661,664,671,680,683,686, &
     692,698,707,717,720,729,732,735,738,741,748,752, &
     765,775,784,793,802,810,822,832,840,849,856,867, &
     876,880,884,887,890,893,896,899,906,913,921,924, &
     935,940,949,954,955,964,967,970,974,978,983,988, &
     992,995,999,1004,1010,1015,1021,1025,1030,1045,1056,1066, &
     1070,1073,1081,1086,1091,1095,1099,1102,1106,1110,1114,1118, &
     1122,1126,1129,1133,1138,1143,1148,1154,1157,1162,1163,1166, &
     1169,1172,1184,1198,1202,1206,1209,1212,1215,1218,1224,1228, &
     1236,1240,1245,1251,1254,1257,1261,1272,1274,1277,1281,1292, &
     1295,1298,1308,1320,1327,1335,1340,1348,1358,1368,1374,1378, &
     1383,1387,1391,1395,1399,1403,1408,1413,1418,1423,1427,1432, &
     1436,1440,1443,1455,1470,1473,1485,1488,1494,1499,1505,1518, &
     1529,1539,1549,1554,1561,1564,1574,1585,1588,1591,1597,1605, &
     1608,1616,1619,1625,1628,1634,1640,1645,1650,1653,1657,1661, &
     1664,1666,1669,1673,1677,1679,1682,1685,1689,1693,1696,1699, &
     1703,1707,1710,1713,1717,1721,1724,1727,1730,1734,1738,1741, &
     1743,1746,1750,1754,1757,1759,1766,1775,1781,1787,1790,1793 /)
  INTEGER, PARAMETER, DIMENSION(285) :: CCOL_STOICM_1 = (/ &
     1797,1799,1804,1809,1813,1816,1819,1824,1830,1833,1836,1839, &
     1843,1846,1851,1854,1859,1863,1868,1873,1877,1881,1885,1889, &
     1894,1898,1906,1914,1922,1930,1935,1942,1948,1952,1963,1966, &
     1973,1977,1981,1985,1990,1994,2001,2006,2010,2018,2026,2036, &
     2045,2055,2059,2063,2066,2074,2077,2080,2083,2086,2092,2095, &
     2099,2102,2107,2114,2122,2124,2129,2135,2137,2146,2156,2158, &
     2161,2167,2172,2174,2177,2180,2183,2186,2199,2202,2205,2208, &
     2222,2225,2228,2236,2241,2244,2250,2253,2256,2260,2265,2269, &
     2272,2277,2281,2285,2295,2306,2313,2314,2315,2316,2317,2318, &
     2319,2320,2321,2322,2323,2324,2325,2326,2327,2328,2329,2330, &
     2331,2332,2333,2335,2336,2337,2338,2339,2340,2341,2342,2343, &
     2344,2345,2346,2347,2348,2349,2350,2351,2352,2353,2354,2355, &
     2356,2357,2358,2359,2360,2361,2362,2363,2364,2365,2366,2367, &
     2368,2369,2370,2371,2372,2373,2374,2375,2376,2377,2378,2379, &
     2380,2381,2382,2383,2384,2385,2386,2387,2388,2389,2390,2391, &
     2392,2393,2394,2395,2396,2397,2398,2399,2400,2401,2402,2403, &
     2404,2405,2406,2407,2408,2409,2410,2411,2412,2413,2414,2415, &
     2416,2417,2418,2419,2420,2421,2422,2423,2424,2425,2426,2427, &
     2428,2429,2430,2431,2432,2433,2434,2435,2436,2437,2438,2439, &
     2440,2441,2442,2443,2444,2445,2446,2447,2448,2449,2450,2451, &
     2452,2453,2454,2455,2456,2457,2458,2459,2460,2461,2462,2463, &
     2464,2465,2466,2467,2468,2469,2470,2471,2472,2473,2474,2475, &
     2476,2477,2478,2479,2480,2481,2482,2483,2484,2485,2486,2487, &
     2488,2489,2490,2491,2492,2493,2494,2495,2496 /)
  INTEGER, PARAMETER, DIMENSION(645) :: CCOL_STOICM = (/&
    CCOL_STOICM_0, CCOL_STOICM_1 /)

  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_0 = (/ &
      80,175, 80,175, 80,179,185, 80,179,185, 80,183, &
     185, 31, 80,175,179,185,175,183,185,179,185,179, &
     183,185,179,183, 35,183,185, 31,187,175,187,188, &
      71,187,188, 86,187,188,175,187,188,187,188, 86, &
     188, 43,179,187,135,185,187,183,185,187,188,179, &
     185,187,188, 68,185,188, 68,185,187,183,185,187, &
     188, 43,185,187,135,183,187, 31,175, 80,175, 86, &
     187, 80,179,185,179,183, 80,183,185, 43,179,187, &
     135,185,187,183,185, 35,183,185, 68,183,185,187, &
     188, 35,183,185, 68,185,188, 49,181,187,162,179, &
     181,185,188, 61,181,188,139,162,181,162,181,188, &
      58,181,185, 58,181,185, 61,181,187, 61,162, 23, &
     162,186,187,188,135,162,183,186,188,139,162,187, &
     188,  2,186,187,188, 61,162,187,188, 23,162,186, &
     188, 23, 71,162,186, 58,162,183,188, 58,181,185, &
      32,177,187,141,177,179,185,188, 64,177,188,118, &
     141,177,141,177,188,118,139,141,162,177,181,141, &
     162,177,181,188, 59,177,185, 59,177,185, 64,177, &
     187, 64,141, 50,141,187,188, 50,135,141,183,188, &
     118,141,187,188,  2, 50,187,188, 64,141,187,188, &
      50,141,188, 50, 71,141, 59,141,183,188, 59,177, &
     185,118,125,141,145,176,177,188,118,125,141,157, &
     162,168,172,176,177,188, 85,118,141,161,172,177, &
     188,118,125,128,141,145,152,161,171,172,176,177, &
     180,181,188,118,125,141,162,171,172,173,176,177, &
     185,188, 24,118,141,155,165,168,177,182,188,118, &
     125,141,160,172,177,180,182,188,118,125,128,141, &
     152,177,188,118,125,141,158,162,172,176,177,185, &
     188,141,161,177,178,188, 13,141,177,178,141,177, &
     181,182,188,134,141,177,182, 89,155,187, 24, 89 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_1 = (/ &
     165,  2, 98,187,188,162,172,182,186,187,188,135, &
     172,182,183, 78,182,185, 78,182,185,  2,179,181, &
     182,185, 54,161,187,161,172,179,185,188, 33,152, &
     187, 33,145,187,145,176,179,185,188,157,162,172, &
     179,185,188, 51,171,187,128,145,152,161,171,172, &
     176,179,180,181,185,188,171,179,184,162,172,173, &
     176,179,185,155,162,179,182,185,160,172,179,182, &
     184,185,123,130,154,162,166,167,169,174,179,185, &
     188, 88, 92,167,136,150,153,162,165,179,182,185, &
     188,143,162,164,165,168,179,185,186,188,164,168, &
     186,187,146,147,162,165,179,185,186,187,128,152, &
     179,185,188,162,163,166,169,170,174,179,185,188, &
     162,163,166,169,170,174,183,185,188,135,140,149, &
     163,183,  5,146,149,183,185,186,188,  5,146,149, &
     179,185,186,188,  5,124,149,185,  5, 13, 79,149, &
     175,185,188,  5,140,142,146,183,185,  5,140,142, &
     146,179,185,  5,115,140,188,  5,139,140,142,146, &
     162,181,185,188,139,142,146,162,163,175,185,188, &
     137,149,163,187,  5,137,142,146,179,188,  5,115, &
     137,188,  5,137,139,142,146,162,181,188,154,162, &
     163,166,169,170,174,185,188,158,162,172,179,185, &
      51,135,171,183,173,184,187,  2,134,181,187,176, &
     178,187, 37,178,185, 37,178,185, 60,124,185,117, &
     159,185, 60,124,185,117,159,185,161,178,179,185, &
       2,159,162,179,181,182,185,186,135,176,178,183, &
     128,155,187,125,139,145,162,176,181,188,125,139, &
     157,162,168,172,176,181,188, 87,171,188,173,184, &
     188, 89,155,162,182,187,188, 89,160,172,182,187, &
     188, 93,103,104,162,167,169,174,187,188, 94,150, &
     153,162,165,176,180,182,187,188, 99,164,188,110 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_2 = (/ &
     146,147,162,165,185,186,187,188, 63,152,188,115, &
     170,188, 82,158,188,160,180,187, 85,139,161,162, &
     172,181,188,135,160,180,183,125,128,139,145,152, &
     161,162,171,172,176,180,181,188,125,139,162,171, &
     172,173,176,181,185,188, 24,139,155,162,165,168, &
     181,182,188,125,139,160,162,172,180,181,182,188, &
     125,139,162,166,167,169,174,181,188,123,162,166, &
     167,169,174,186,188, 71,125,139,150,156,162,165, &
     168,180,181,186,188,125,139,150,153,162,165,180, &
     181,182,188,125,162,164,165,168,181,186,188,146, &
     147,162,165,181,184,185,186,188,125,128,139,152, &
     162,181,188,139,154,162,163,166,169,170,174,181, &
     185,188,125,139,158,162,172,176,181,185,188, 85, &
     172,187,188,125,176,187,188,161,172,188, 85,161, &
     172, 70,161,188, 62,145,188, 81,157,188, 56,134, &
     175,181,182,187,188, 13, 79,161,175,178,187,188, &
     110,159,162,175,181,186,187,188,133,157,187, 49, &
     119,131,133,162,172,175,181,186,187,188,117,168, &
     185,186,187,  4, 78,124,162,168,183,186,187,188, &
     117,162,175,182,183,  4,  2, 22, 98,142,150,162, &
     186,187,188, 98,150,186,133,158,183,142,186,187, &
     188,165,182,186,187,135,142,183,186,188,135,165, &
     182,183,186, 17,132,167,187,153,174,187, 60,164, &
     169,187, 24,165,168,187,188,  2, 98,134,168,181, &
     186,145,176,181,182,188,157,162,172,181,182,188, &
     134,145,176,182,134,157,168,176,182,116,129,131, &
     132,133,153,162,169,174,175,181,182,186,187,188, &
     127,131,162,165,172,174,175,182,186,187,188,121, &
     131,162,165,169,175,182,186,187,188, 18,132,170, &
     183,147,169,183, 60,110,135,164,169,183,186,188 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_3 = (/ &
     161,162,178,181,188,159,162,181,182,188, 13,162, &
     178,181, 13,159,162,181,115,180,185,115,170,184, &
     187, 82,146,158,187, 70,161,172,187, 62,145,176, &
     187, 63,128,152,187, 87,171,176,187, 79,178,187, &
      81,157,168,187,  6,103,166,167,187,  6, 93,166, &
     167,187,  6,104,166,167,187,  6, 52, 53,103,156, &
     187, 52, 53, 93,  6, 42,104,156,187,  6, 52,138, &
     187, 53,138,187, 42,138,187,  2, 95, 98,138,142, &
     150,162,165,168,186,187,188,  2, 95, 98,138,142, &
     150,162,165,168,179,185,186,187,188, 97,102,156, &
     187, 94,153,180,187, 99,164,187,  2, 99,168,110, &
     159,187,110,151,187,  2,151,168,181,182,187,134, &
     151,180,182,  2,125,151,162,168,181,187,188,  2, &
     151,168,187,  2,151,168,187,188,  2,151,168,179, &
     185,187,135,151,179, 56,182,187, 54,135,161,183, &
     120,121,150,162,165,166,175,182,186,187,188,181, &
     182,162,182,188,134,162,181,182,128,145,152,161, &
     171,172,176,180,181,182,188,155,162,181,160,172, &
     181,  2,123,162,166,167,169,174,181,182,188,100, &
     102,142,150,156,165,168,176,181,182,186,188,150, &
     153,162,165,181,182,188,162,164,165,168,181,182, &
     186,188,128,152,181,182,188,162,171,172,173,176, &
     181,182,185,  2,146,147,162,165,181,182,185,186, &
     188,162,163,166,169,170,174,181,182,185,188,158, &
     162,172,181,182,185,134,171,180,182, 24,134,155, &
     165,182,134,160,180,182,134,167,180,182,134,156, &
     180,182,134,153,180,182,134,164,180,182,134,173, &
     176,182,185,134,147,176,182,185,134,170,176,182, &
     185,134,158,176,182,185,128,134,152,182,161,172, &
     181,182,188,134,161,172,182,161,178,181,182,159 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_4 = (/ &
     162,181,  2, 98,130,135,136,143,146,162,175,186, &
     187,188,  2, 85,109,135,139,142,146,150,154,162, &
     168,175,182,185,187,156,166,187,100,102,142,150, &
     156,165,168,176,179,185,186,188,135,156,179, 97, &
     150,156,165,187,188, 42,144,154,185,187, 52, 53, &
     130,148,185,187,  3, 98,109,136,143,144,146,150, &
     162,168,179,185,188,106,109,136,143,144,146,150, &
     162,168,187,188,  3,136,143,148,150,162,168,179, &
     185,188,106,136,143,148,150,162,168,185,187,188, &
     106,144,148,173,187, 10, 98,136,162,165,183,187, &
     126,143,187,  2, 98,126,134,162,165,168,179,183, &
     185,  2, 98,126,134,162,165,168,183,185,187,188, &
      36,126,185, 36,126,185,102,168,180,186,187,188, &
     123,142,150,165,168,179,185,188,123,135,179, 87, &
     123,142,150,165,168,187,188,100,122,187,  2,122, &
     176,179,185,188,122,135,179,  2, 87,122,176,187, &
     188,  2,100,175,180,187,188,  2,109,162,185,187, &
      24,146,165,185,187,131,162,186,131,162,179,185, &
     131,162,183,185, 86,131,162, 98,131,129,169,186, &
     129,169,179,185,129,169,183,185, 99,129, 86,129, &
     169,116,174,186,116,174,179,185,116,174,183,185, &
      86,116,174,121,165,186,121,165,179,185,121,165, &
     183,185, 86,121,165,127,165,186,127,165,179,185, &
     127,165,183,185,127,181,182, 86,127,165,119,172, &
     186,119,172,179,185,119,172,183,185, 86,119,172, &
     119,134,120,150,186,120,150,179,185,120,150,183, &
     185, 86,120,150,120,168, 95,162,165,182,186,187, &
     188,  2, 88, 96,142,162,165,182,186,187, 92,142, &
     165,179,185,187, 96,142,165,179,185,187, 13, 92, &
     188, 13, 96,188, 13, 92,186,187, 34, 92,172,181 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_5 = (/ &
     182,186,188, 78,181,182,183,185,161,176,186,188, &
     128,181,182,128,181,186,161,178,180,181,182,139, &
     150,162,186,187,188,142,186,188, 71,142,186,142, &
     162,186,165,182,186,188,133,174,186,162,174,182, &
     186,188,174,178,181,162,169,182,186,188,162,168, &
     182,188,115,176,185,187,188, 82,176,185,187,188, &
      70,172,187,188, 62,176,187,188, 63,128,187,188, &
      87,176,187,188, 81,162,172,187,188, 79,172,187, &
     188,  6,103,162,166,169,174,187,188,  6, 93,162, &
     166,169,174,187,188,  6,104,162,166,169,174,187, &
     188, 71, 97,150,165,168,186,187,188,106,176,185, &
     187,188, 94,150,162,165,182,187,188, 99,162,168, &
     186,187,188,110,162,182,187,128,145,152,161,172, &
     176,180,181,184,185,188, 56,181,187,143,162,165, &
     168,185,186,188,136,150,182,185,130,166,185,188, &
     154,166,185,188,146,162,181,185,186, 89,162,182, &
     187,  2, 60,124,162,182,183,185,109,162,185,186, &
     188, 34,142,165,187, 88,150,165,168,182,186,187, &
     188,142,150,162,163,165,168,185,188, 20, 25, 27, &
      44, 45, 47, 75,107,187,188, 19, 25, 26, 39, 40, &
      41, 91,187,188, 21, 25, 27, 46, 47, 48, 75,112, &
     187,188, 90,101,187,188, 90,101,179,185, 73, 91, &
     188, 22, 29, 65, 91,142,179,185,188, 73, 91,187, &
      55, 90,187, 67, 75,188, 67, 75,187, 28, 55, 75, &
     179,185,188, 57,101,188, 83,101,179,185, 57,101, &
     187, 45, 76, 83,187,188, 24,113,165,181,186,187, &
     188, 24,113,165,179,181,185,186,188,113,185, 22, &
     108,142,186,188, 22,108,142,179,185,186,108,185, &
      22, 24,114,142,165,181,186,187,188, 22, 24,114, &
     142,165,179,181,185,186,188,114,185, 69, 76,188 /)
  INTEGER, PARAMETER, DIMENSION(335) :: IROW_STOICM_6 = (/ &
      22, 76,142,179,185,188, 41, 76, 83,187,188, 83, &
     185, 83,101,175, 69, 76,187, 38, 90,185,105,107, &
     188, 22, 24, 29, 30, 65, 72, 74,107,142,165,179, &
     185,188,105,107,187, 38, 90,185,111,112,188, 22, &
      24, 29, 30, 65, 66, 72, 74,112,142,165,179,185, &
     188,111,112,187, 77, 84,188, 22, 24, 84,142,165, &
     179,185,188, 48, 83, 84,187,188, 77, 84,187, 22, &
      72, 73,142,187,188, 72,108,188, 65,113,188, 74, &
     114,186,188, 66,165,182,186,188, 55, 67,187,188, &
      57, 83,187, 22, 69,142,187,188, 40, 72,186,188, &
      47,182,186,188, 22, 24, 65, 72, 74,105,142,165, &
     187,188, 22, 24, 65, 66, 72, 74,111,142,165,187, &
     188, 22, 24, 77,142,165,187,188, 32, 50,175,141, &
     179, 39, 44, 46,145,128,134,172, 51,155, 89,152, &
      39,  1, 54, 33, 23,162,131,119,186,  2,  3, 34, &
     102, 92,123, 85,109,161, 70,120,150,142, 86,168, &
      95,166,156, 98, 43,135, 68,188, 88, 96, 97, 52, &
      53, 42,138,  4, 60,170,115,124,163,  5,149,140, &
     137,106,132,130,148,154,144,160,  6,169,143,126, &
     129,147,110,151, 56,  7,  8,182,180,127,165,121, &
     100,122,181, 61, 58,164, 99,174,136,116, 35,159, &
     179,185,183,117, 31,175,187, 78, 36,  9,157, 81, &
      37,158,133, 82,146, 10,173,184,171, 87, 62, 63, &
     176,178,167,103, 93,104,125, 79, 44,153, 94, 46, &
      49, 11, 71, 12,139, 80, 13, 14, 15, 16, 32, 50, &
     141,177, 64, 59,118, 91, 40,107, 47, 48, 41, 45, &
     112, 73, 72, 65, 74, 66, 90, 75, 55, 67,101, 57, &
     113,108,114, 76, 83,105, 38, 84, 77,111, 69 /)
  INTEGER, PARAMETER, DIMENSION(2495) :: IROW_STOICM = (/&
    IROW_STOICM_0, IROW_STOICM_1, IROW_STOICM_2, IROW_STOICM_3, IROW_STOICM_4, &
    IROW_STOICM_5, IROW_STOICM_6 /)

  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_0 = (/ &
       1,  1,  2,  2,  3,  3,  3,  4,  4,  4,  5,  5, &
       5,  6,  6,  7,  7,  7,  8,  8,  8,  9,  9, 10, &
      10, 10, 11, 11, 12, 12, 12, 13, 13, 14, 14, 14, &
      15, 15, 15, 16, 16, 16, 17, 17, 17, 18, 18, 19, &
      19, 20, 20, 20, 21, 21, 21, 22, 22, 22, 22, 23, &
      23, 23, 23, 24, 24, 24, 25, 25, 25, 26, 26, 26, &
      26, 27, 27, 27, 28, 28, 28, 29, 29, 30, 30, 31, &
      31, 32, 32, 32, 33, 33, 34, 34, 34, 35, 35, 35, &
      36, 36, 36, 37, 37, 38, 38, 38, 39, 39, 39, 39, &
      39, 40, 40, 40, 41, 41, 41, 42, 42, 42, 43, 43, &
      43, 43, 43, 44, 44, 44, 45, 45, 45, 46, 46, 46, &
      47, 47, 47, 48, 48, 48, 49, 49, 49, 50, 50, 51, &
      51, 51, 51, 51, 52, 52, 52, 52, 52, 53, 53, 53, &
      53, 54, 54, 54, 54, 55, 55, 55, 55, 56, 56, 56, &
      56, 57, 57, 57, 57, 58, 58, 58, 58, 59, 59, 59, &
      60, 60, 60, 61, 61, 61, 61, 61, 62, 62, 62, 63, &
      63, 63, 64, 64, 64, 65, 65, 65, 65, 65, 65, 66, &
      66, 66, 66, 66, 67, 67, 67, 68, 68, 68, 69, 69, &
      69, 70, 70, 71, 71, 71, 71, 72, 72, 72, 72, 72, &
      73, 73, 73, 73, 74, 74, 74, 74, 75, 75, 75, 75, &
      76, 76, 76, 77, 77, 77, 78, 78, 78, 78, 79, 79, &
      79, 80, 80, 80, 80, 80, 80, 80, 81, 81, 81, 81, &
      81, 81, 81, 81, 81, 81, 82, 82, 82, 82, 82, 82, &
      82, 83, 83, 83, 83, 83, 83, 83, 83, 83, 83, 83, &
      83, 83, 83, 84, 84, 84, 84, 84, 84, 84, 84, 84, &
      84, 84, 85, 85, 85, 85, 85, 85, 85, 85, 85, 86, &
      86, 86, 86, 86, 86, 86, 86, 86, 87, 87, 87, 87, &
      87, 87, 87, 88, 88, 88, 88, 88, 88, 88, 88, 88, &
      88, 89, 89, 89, 89, 89, 90, 90, 90, 90, 91, 91, &
      91, 91, 91, 92, 92, 92, 92, 93, 93, 93, 94, 94 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_1 = (/ &
      94, 95, 95, 95, 95, 96, 96, 96, 96, 96, 96, 97, &
      97, 97, 97, 98, 98, 98, 99, 99, 99,100,100,100, &
     100,100,101,101,101,102,102,102,102,102,103,103, &
     103,104,104,104,105,105,105,105,105,106,106,106, &
     106,106,106,107,107,107,108,108,108,108,108,108, &
     108,108,108,108,108,108,109,109,109,110,110,110, &
     110,110,110,111,111,111,111,111,112,112,112,112, &
     112,112,113,113,113,113,113,113,113,113,113,113, &
     113,114,114,114,115,115,115,115,115,115,115,115, &
     115,116,116,116,116,116,116,116,116,116,117,117, &
     117,117,118,118,118,118,118,118,118,118,119,119, &
     119,119,119,120,120,120,120,120,120,120,120,120, &
     121,121,121,121,121,121,121,121,121,122,122,122, &
     122,122,123,123,123,123,123,123,123,124,124,124, &
     124,124,124,124,125,125,125,125,126,126,126,126, &
     126,126,126,127,127,127,127,127,127,128,128,128, &
     128,128,128,129,129,129,129,130,130,130,130,130, &
     130,130,130,130,131,131,131,131,131,131,131,131, &
     132,132,132,132,133,133,133,133,133,133,134,134, &
     134,134,135,135,135,135,135,135,135,135,136,136, &
     136,136,136,136,136,136,136,137,137,137,137,137, &
     138,138,138,138,139,139,139,140,140,140,140,141, &
     141,141,142,142,142,143,143,143,144,144,144,145, &
     145,145,146,146,146,147,147,147,148,148,148,148, &
     149,149,149,149,149,149,149,149,150,150,150,150, &
     151,151,151,152,152,152,152,152,152,152,153,153, &
     153,153,153,153,153,153,153,154,154,154,155,155, &
     155,156,156,156,156,156,156,157,157,157,157,157, &
     157,158,158,158,158,158,158,158,158,158,159,159, &
     159,159,159,159,159,159,159,159,160,160,160,161 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_2 = (/ &
     161,161,161,161,161,161,161,161,162,162,162,163, &
     163,163,164,164,164,165,165,165,166,166,166,166, &
     166,166,166,167,167,167,167,168,168,168,168,168, &
     168,168,168,168,168,168,168,168,169,169,169,169, &
     169,169,169,169,169,169,170,170,170,170,170,170, &
     170,170,170,171,171,171,171,171,171,171,171,171, &
     172,172,172,172,172,172,172,172,172,173,173,173, &
     173,173,173,173,173,174,174,174,174,174,174,174, &
     174,174,174,174,174,175,175,175,175,175,175,175, &
     175,175,175,176,176,176,176,176,176,176,176,177, &
     177,177,177,177,177,177,177,177,178,178,178,178, &
     178,178,178,179,179,179,179,179,179,179,179,179, &
     179,179,180,180,180,180,180,180,180,180,180,181, &
     181,181,181,182,182,182,182,183,183,183,184,184, &
     184,185,185,185,186,186,186,187,187,187,188,188, &
     188,188,188,188,188,189,189,189,189,189,189,189, &
     190,190,190,190,190,190,190,190,191,191,191,192, &
     192,192,192,192,192,192,192,192,192,192,193,193, &
     193,193,193,194,194,194,194,194,194,194,194,194, &
     195,195,195,195,195,196,197,197,197,197,197,197, &
     197,197,197,198,198,198,199,199,199,200,200,200, &
     200,201,201,201,201,202,202,202,202,202,203,203, &
     203,203,203,204,204,204,204,205,205,205,206,206, &
     206,206,207,207,207,207,207,208,208,208,208,208, &
     208,209,209,209,209,209,210,210,210,210,210,210, &
     211,211,211,211,212,212,212,212,212,213,213,213, &
     213,213,213,213,213,213,213,213,213,213,213,213, &
     214,214,214,214,214,214,214,214,214,214,214,215, &
     215,215,215,215,215,215,215,215,215,216,216,216, &
     216,217,217,217,218,218,218,218,218,218,218,218 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_3 = (/ &
     219,219,219,219,219,220,220,220,220,220,221,221, &
     221,221,222,222,222,222,223,223,223,224,224,224, &
     224,225,225,225,225,226,226,226,226,227,227,227, &
     227,228,228,228,228,229,229,229,229,230,230,230, &
     231,231,231,231,232,232,232,232,232,233,233,233, &
     233,233,234,234,234,234,234,235,235,235,235,235, &
     235,236,236,236,237,237,237,237,237,238,239,239, &
     239,240,240,240,241,241,241,242,242,242,242,242, &
     242,242,242,242,242,242,242,243,243,243,243,243, &
     243,243,243,243,243,243,243,243,243,244,244,244, &
     244,245,245,245,245,246,246,246,247,247,247,248, &
     248,248,249,249,249,250,250,250,250,250,250,251, &
     251,251,251,252,252,252,252,252,252,252,252,253, &
     253,253,253,254,254,254,254,254,255,255,255,255, &
     255,255,256,256,256,257,257,257,258,258,258,258, &
     259,259,259,259,259,259,259,259,259,259,259,260, &
     260,261,261,261,262,262,262,262,263,263,263,263, &
     263,263,263,263,263,263,263,264,264,264,265,265, &
     265,266,266,266,266,266,266,266,266,266,266,267, &
     267,267,267,267,267,267,267,267,267,267,267,268, &
     268,268,268,268,268,268,269,269,269,269,269,269, &
     269,269,270,270,270,270,270,271,271,271,271,271, &
     271,271,271,272,272,272,272,272,272,272,272,272, &
     272,273,273,273,273,273,273,273,273,273,273,274, &
     274,274,274,274,274,275,275,275,275,276,276,276, &
     276,276,277,277,277,277,278,278,278,278,279,279, &
     279,279,280,280,280,280,281,281,281,281,282,282, &
     282,282,282,283,283,283,283,283,284,284,284,284, &
     284,285,285,285,285,285,286,286,286,286,287,287, &
     287,287,287,288,288,288,288,289,289,289,289,290 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_4 = (/ &
     290,290,291,291,291,291,291,291,291,291,291,291, &
     291,291,292,292,292,292,292,292,292,292,292,292, &
     292,292,292,292,292,293,293,293,294,294,294,294, &
     294,294,294,294,294,294,294,294,295,295,295,296, &
     296,296,296,296,296,297,297,297,297,297,298,298, &
     298,298,298,298,299,299,299,299,299,299,299,299, &
     299,299,299,299,299,300,300,300,300,300,300,300, &
     300,300,300,300,301,301,301,301,301,301,301,301, &
     301,301,302,302,302,302,302,302,302,302,302,302, &
     303,303,303,303,303,304,304,304,304,304,304,304, &
     305,305,305,306,306,306,306,306,306,306,306,306, &
     306,307,307,307,307,307,307,307,307,307,307,307, &
     308,308,308,309,309,309,310,310,310,310,310,310, &
     311,311,311,311,311,311,311,311,312,312,312,313, &
     313,313,313,313,313,313,313,314,314,314,315,315, &
     315,315,315,315,316,316,316,317,317,317,317,317, &
     317,318,318,318,318,318,318,319,319,319,319,319, &
     320,320,320,320,320,321,321,321,322,322,322,322, &
     323,323,323,323,324,324,324,325,325,326,326,326, &
     327,327,327,327,328,328,328,328,329,329,330,330, &
     330,331,331,331,332,332,332,332,333,333,333,333, &
     334,334,334,335,335,335,336,336,336,336,337,337, &
     337,337,338,338,338,339,339,339,340,340,340,340, &
     341,341,341,341,342,342,342,343,343,343,344,344, &
     344,345,345,345,345,346,346,346,346,347,347,347, &
     348,348,349,349,349,350,350,350,350,351,351,351, &
     351,352,352,352,353,353,354,354,354,354,354,354, &
     354,355,355,355,355,355,355,355,355,355,356,356, &
     356,356,356,356,357,357,357,357,357,357,358,358, &
     358,359,359,359,360,360,360,360,361,361,362,362 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_5 = (/ &
     362,362,362,363,363,363,363,363,364,364,364,364, &
     365,365,365,366,366,366,367,367,367,367,367,368, &
     368,368,368,368,368,369,369,369,370,370,370,371, &
     371,371,372,372,372,372,373,373,373,374,374,374, &
     374,374,375,375,375,376,376,376,376,376,377,377, &
     377,377,378,378,378,378,378,379,379,379,379,379, &
     380,380,380,380,381,381,381,381,382,382,382,382, &
     383,383,383,383,384,384,384,384,384,385,385,385, &
     385,386,386,386,386,386,386,386,386,387,387,387, &
     387,387,387,387,387,388,388,388,388,388,388,388, &
     388,389,389,389,389,389,389,389,389,390,390,390, &
     390,390,391,391,391,391,391,391,391,392,392,392, &
     392,392,392,393,393,393,393,394,394,394,394,394, &
     394,394,394,394,394,394,395,395,395,396,396,396, &
     396,396,396,396,397,397,397,397,398,398,398,398, &
     399,399,399,399,400,400,400,400,400,401,401,401, &
     401,402,402,402,402,402,402,402,403,403,403,403, &
     403,404,404,404,404,405,405,405,405,405,405,405, &
     405,406,406,406,406,406,406,406,406,407,407,407, &
     407,407,407,407,407,407,407,408,408,408,408,408, &
     408,408,408,408,409,409,409,409,409,409,409,409, &
     409,409,410,410,410,410,411,411,411,411,412,412, &
     412,413,413,413,413,413,413,413,413,414,414,414, &
     415,415,415,416,416,416,417,417,417,418,418,418, &
     418,418,418,419,419,419,420,420,420,420,421,421, &
     421,422,422,422,422,422,423,423,423,423,423,423, &
     423,424,424,424,424,424,424,424,424,425,425,426, &
     426,426,426,426,427,427,427,427,427,427,428,428, &
     429,429,429,429,429,429,429,429,429,430,430,430, &
     430,430,430,430,430,430,430,431,431,432,432,432 /)
  INTEGER, PARAMETER, DIMENSION(335) :: ICOL_STOICM_6 = (/ &
     433,433,433,433,433,433,434,434,434,434,434,435, &
     435,436,436,436,437,437,437,438,438,438,439,439, &
     439,440,440,440,440,440,440,440,440,440,440,440, &
     440,440,441,441,441,442,442,442,443,443,443,444, &
     444,444,444,444,444,444,444,444,444,444,444,444, &
     444,445,445,445,446,446,446,447,447,447,447,447, &
     447,447,447,448,448,448,448,448,449,449,449,450, &
     450,450,450,450,450,451,451,451,452,452,452,453, &
     453,453,453,454,454,454,454,454,455,455,455,455, &
     456,456,456,457,457,457,457,457,458,458,458,458, &
     459,459,459,459,460,460,460,460,460,460,460,460, &
     460,460,461,461,461,461,461,461,461,461,461,461, &
     461,462,462,462,462,462,462,462,463,464,465,466, &
     467,468,469,470,471,472,473,474,475,476,477,478, &
     479,480,481,482,483,483,484,485,486,487,488,489, &
     490,491,492,493,494,495,496,497,498,499,500,501, &
     502,503,504,505,506,507,508,509,510,511,512,513, &
     514,515,516,517,518,519,520,521,522,523,524,525, &
     526,527,528,529,530,531,532,533,534,535,536,537, &
     538,539,540,541,542,543,544,545,546,547,548,549, &
     550,551,552,553,554,555,556,557,558,559,560,561, &
     562,563,564,565,566,567,568,569,570,571,572,573, &
     574,575,576,577,578,579,580,581,582,583,584,585, &
     586,587,588,589,590,591,592,593,594,595,596,597, &
     598,599,600,601,602,603,604,605,606,607,608,609, &
     610,611,612,613,614,615,616,617,618,619,620,621, &
     622,623,624,625,626,627,628,629,630,631,632,633, &
     634,635,636,637,638,639,640,641,642,643,644 /)
  INTEGER, PARAMETER, DIMENSION(2495) :: ICOL_STOICM = (/&
    ICOL_STOICM_0, ICOL_STOICM_1, ICOL_STOICM_2, ICOL_STOICM_3, ICOL_STOICM_4, &
    ICOL_STOICM_5, ICOL_STOICM_6 /)

  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_0 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp, &
       2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       5.000000e-02_dp,  9.500000e-01_dp,  5.000000e-02_dp,  9.500000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp, &
       -2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_1 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp, &
       -2.000000e+00_dp,  2.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp, &
       7.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       1.600000e-01_dp,  5.000000e-01_dp,  9.000000e-02_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  1.600000e-01_dp, &
       7.500000e-01_dp,  3.000000e-02_dp,  9.000000e-02_dp,  1.600000e-01_dp,  -1.000000e+00_dp, &
       1.600000e-01_dp,  7.000000e-02_dp,  -1.000000e+00_dp,  3.500000e-01_dp,  9.000000e-02_dp, &
       6.400000e-01_dp,  2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  2.000000e-01_dp, &
       1.500000e-01_dp,  3.800000e-01_dp,  -1.000000e+00_dp,  5.400000e-01_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_2 = (/ &
       1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  2.000000e-01_dp,  -1.000000e+00_dp,  3.000000e-01_dp, &
       3.000000e-01_dp,  2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       5.000000e-02_dp,  -1.000000e+00_dp,  9.500000e-01_dp,  5.000000e-02_dp,  -1.000000e+00_dp, &
       5.000000e-02_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.200000e-01_dp, &
       5.000000e-02_dp,  1.800000e-01_dp,  3.200000e-01_dp,  -1.000000e+00_dp,  3.200000e-01_dp, &
       1.400000e-01_dp,  -1.000000e+00_dp,  1.900000e-01_dp,  1.900000e-01_dp,  1.000000e+00_dp, &
       2.700000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.700000e-01_dp, &
       8.600000e-01_dp,  -1.000000e+00_dp,  5.700000e-01_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  9.300000e-01_dp,  -1.000000e+00_dp,  9.300000e-01_dp,  7.000000e-02_dp, &
       9.300000e-01_dp,  3.000000e-02_dp,  8.100000e-02_dp,  9.000000e-03_dp,  8.200000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_3 = (/ &
       5.800000e-02_dp,  -1.000000e+00_dp,  3.440000e-01_dp,  4.760000e-01_dp,  -1.000000e+00_dp, &
       9.100000e-01_dp,  8.200000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.200000e-01_dp,  5.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-01_dp,  3.500000e-01_dp, &
       -1.000000e+00_dp,  5.300000e-01_dp,  8.800000e-01_dp,  3.500000e-01_dp,  1.500000e-01_dp, &
       1.220000e-01_dp,  -1.000000e+00_dp,  1.220000e-01_dp,  7.280000e-01_dp,  -1.000000e+00_dp, &
       8.500000e-01_dp,  7.280000e-01_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  1.500000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       7.000000e-02_dp,  7.000000e-01_dp,  2.300000e-01_dp,  3.500000e-02_dp,  -1.000000e+00_dp, &
       3.500000e-02_dp,  -1.000000e+00_dp,  1.300000e+00_dp,  8.000000e-01_dp,  7.000000e-02_dp, &
       7.000000e-01_dp,  2.300000e-01_dp,  3.500000e-02_dp,  -1.000000e+00_dp,  3.500000e-02_dp, &
       -1.000000e+00_dp,  1.300000e+00_dp,  8.000000e-01_dp,  6.000000e-01_dp,  4.000000e-01_dp, &
       6.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp,  9.600000e-01_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  4.000000e-02_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  4.000000e-02_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  9.400000e-01_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  4.000000e-02_dp, &
       -1.000000e+00_dp,  9.400000e-01_dp,  9.000000e-01_dp,  -1.000000e+00_dp,  1.880000e+00_dp, &
       4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp, &
       2.500000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  6.600000e-01_dp,  7.500000e-01_dp, &
       -1.000000e+00_dp,  7.000000e-01_dp,  5.000000e-01_dp,  2.500000e-01_dp,  7.000000e-01_dp, &
       3.000000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  7.000000e-01_dp, &
       5.000000e-01_dp,  6.550000e-01_dp,  3.450000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  -1.000000e+00_dp,  9.190000e-01_dp,  8.940000e-01_dp,  -1.000000e+00_dp, &
       9.340000e-01_dp,  4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  7.000000e-01_dp,  6.600000e-01_dp, &
       7.500000e-01_dp,  -1.000000e+00_dp,  1.200000e+00_dp,  5.000000e-01_dp,  7.000000e-02_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_4 = (/ &
       1.200000e+00_dp,  2.300000e-01_dp,  3.500000e-02_dp,  -2.000000e+00_dp,  3.500000e-02_dp, &
       3.000000e-01_dp,  8.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp, &
       -1.000000e+00_dp,  7.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.250000e+00_dp,  1.600000e-01_dp, &
       5.000000e-01_dp,  9.000000e-02_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       8.500000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.500000e-01_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.500000e-01_dp, &
       1.500000e-01_dp,  -1.000000e+00_dp,  2.720000e-01_dp,  6.280000e-01_dp,  3.700000e-02_dp, &
       6.300000e-02_dp,  -1.000000e+00_dp,  2.500000e-02_dp,  3.800000e-02_dp,  6.300000e-02_dp, &
       -9.370000e-01_dp,  1.000000e-01_dp,  5.780000e-01_dp,  -1.000000e+00_dp,  1.020000e-01_dp, &
       1.020000e-01_dp,  3.300000e-02_dp,  1.870000e-01_dp,  5.780000e-01_dp,  6.800000e-01_dp, &
       -8.980000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  8.500000e-01_dp, &
       7.500000e-02_dp,  -1.000000e+00_dp,  7.500000e-02_dp,  7.500000e-02_dp,  9.250000e-01_dp, &
       7.500000e-02_dp,  1.500000e-01_dp,  -9.250000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  7.500000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_5 = (/ &
       -1.000000e+00_dp,  2.500000e-01_dp,  1.600000e-01_dp,  2.500000e-01_dp,  3.000000e-02_dp, &
       9.000000e-02_dp,  1.600000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  1.600000e-01_dp, &
       7.000000e-02_dp,  3.500000e-01_dp,  -9.100000e-01_dp,  6.400000e-01_dp,  2.500000e-01_dp, &
       2.500000e-01_dp,  9.500000e-01_dp,  1.500000e-01_dp,  3.800000e-01_dp,  -1.000000e+00_dp, &
       5.400000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  2.000000e-01_dp, &
       -1.000000e+00_dp,  3.000000e-01_dp,  3.000000e-01_dp,  2.500000e-01_dp,  2.500000e-01_dp, &
       -1.000000e+00_dp,  7.500000e-01_dp,  5.000000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  2.400000e-01_dp,  2.400000e-01_dp,  1.220000e+00_dp, &
       3.000000e-01_dp,  -1.000000e+00_dp,  1.800000e-01_dp,  2.800000e-01_dp,  -1.000000e+00_dp, &
       1.100000e+00_dp,  9.000000e-02_dp,  7.500000e-01_dp,  1.110000e+00_dp,  -2.000000e+00_dp, &
       2.900000e-01_dp,  4.500000e-01_dp,  2.900000e-01_dp,  9.100000e-01_dp,  9.000000e-02_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  1.300000e-01_dp,  -1.000000e+00_dp,  9.500000e-01_dp, &
       2.900000e-01_dp,  1.800000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  3.300000e-01_dp, &
       1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  3.600000e-01_dp,  -1.000000e+00_dp, &
       8.900000e-01_dp,  1.400000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  3.600000e-01_dp, &
       6.400000e-01_dp,  1.500000e-01_dp,  1.255000e+00_dp,  -1.000000e+00_dp,  2.550000e-01_dp, &
       5.950000e-01_dp,  -1.000000e+00_dp,  5.950000e-01_dp,  1.700000e+00_dp,  3.750000e-01_dp, &
       -1.000000e+00_dp,  6.250000e-01_dp,  3.750000e-01_dp,  -1.000000e+00_dp,  2.500000e-01_dp, &
       3.750000e-01_dp,  3.750000e-01_dp,  3.750000e-01_dp,  2.500000e-01_dp,  7.500000e-01_dp, &
       2.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.850000e-01_dp,  6.000000e-01_dp,  1.150000e-01_dp, &
       1.800000e-02_dp,  -1.000000e+00_dp,  1.800000e-02_dp,  -1.000000e+00_dp,  1.500000e-01_dp, &
       9.000000e-01_dp,  2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.250000e+00_dp, &
       5.000000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp, &
       2.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.100000e-01_dp,  1.500000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_6 = (/ &
       1.500000e-01_dp,  4.400000e-01_dp,  -1.000000e+00_dp,  4.400000e-01_dp,  -1.000000e+00_dp, &
       1.500000e-01_dp,  4.100000e-01_dp,  4.400000e-01_dp,  1.500000e-01_dp,  -1.000000e+00_dp, &
       4.400000e-01_dp,  -1.000000e+00_dp,  4.100000e-01_dp,  -1.000000e+00_dp,  5.900000e-01_dp, &
       1.500000e-01_dp,  3.900000e-01_dp,  3.900000e-01_dp,  4.400000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e-01_dp,  1.200000e-01_dp, &
       1.200000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       2.800000e-01_dp,  5.600000e-01_dp,  3.600000e-01_dp,  2.800000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  7.810000e-01_dp, &
       1.900000e-01_dp,  -1.000000e+00_dp,  1.900000e-01_dp,  3.000000e-02_dp,  8.100000e-01_dp, &
       3.000000e-02_dp,  -1.000000e+00_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.610000e-01_dp, &
       1.340000e-01_dp,  1.340000e-01_dp,  1.340000e-01_dp,  -1.000000e+00_dp,  7.320000e-01_dp, &
       5.050000e-01_dp,  -7.730000e-01_dp,  7.730000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  5.300000e-01_dp, &
       4.700000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  6.500000e-01_dp,  3.500000e-01_dp,  -1.000000e+00_dp,  4.400000e-02_dp, &
       4.400000e-02_dp,  1.100000e-01_dp,  -1.000000e+00_dp,  1.020000e-01_dp,  5.400000e-02_dp, &
       4.560000e-01_dp,  3.000000e-01_dp,  2.000000e-01_dp,  -1.000000e+00_dp,  5.100000e-02_dp, &
       1.050000e-01_dp,  4.950000e-01_dp,  2.430000e-01_dp,  2.370000e-01_dp,  1.200000e-01_dp, &
       1.200000e-01_dp,  6.000000e-01_dp,  5.000000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_7 = (/ &
       -1.000000e+00_dp,  2.800000e-01_dp,  5.600000e-01_dp,  3.600000e-01_dp,  2.800000e-01_dp, &
       2.200000e-02_dp,  3.260000e-01_dp,  1.200000e-01_dp,  8.800000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  9.800000e-02_dp,  6.250000e-01_dp,  2.390000e-01_dp,  1.410000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  3.600000e-01_dp,  6.400000e-01_dp,  -3.600000e-01_dp, &
       -1.000000e+00_dp,  7.910000e-01_dp,  2.090000e-01_dp,  -2.090000e-01_dp,  -1.000000e+00_dp, &
       3.600000e-01_dp,  6.400000e-01_dp,  -3.600000e-01_dp,  -1.000000e+00_dp,  3.600000e-01_dp, &
       6.400000e-01_dp,  -3.600000e-01_dp,  -1.000000e+00_dp,  7.910000e-01_dp,  2.090000e-01_dp, &
       -2.090000e-01_dp,  -1.000000e+00_dp,  2.090000e-01_dp,  7.910000e-01_dp,  -2.090000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  2.090000e-01_dp, &
       7.910000e-01_dp,  -2.090000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  2.430000e-01_dp, &
       7.500000e-01_dp,  -8.750000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  5.130000e-01_dp, &
       4.800000e-01_dp,  -7.400000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  7.430000e-01_dp, &
       2.500000e-01_dp,  -6.250000e-01_dp,  7.000000e-03_dp,  5.780000e-01_dp,  2.720000e-01_dp, &
       -1.000000e+00_dp,  1.430000e-01_dp,  -1.500000e-01_dp,  6.800000e-01_dp,  3.200000e-01_dp, &
       -1.000000e+00_dp,  7.000000e-03_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  4.930000e-01_dp, &
       -5.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.172000e+00_dp,  4.400000e-01_dp,  2.780000e-01_dp,  -1.000000e+00_dp, &
       8.500000e-02_dp,  2.500000e-02_dp,  3.750000e-01_dp,  8.500000e-02_dp,  8.500000e-02_dp, &
       6.000000e-01_dp,  1.125000e+00_dp,  -1.750000e-01_dp,  8.580000e-01_dp,  4.730000e-01_dp, &
       1.420000e-01_dp,  -1.000000e+00_dp,  8.800000e-02_dp,  8.800000e-02_dp,  3.750000e-01_dp, &
       8.800000e-02_dp,  1.170000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  6.780000e-01_dp, &
       1.250000e-01_dp,  8.250000e-01_dp,  -1.000000e+00_dp,  6.540000e-01_dp,  3.460000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_8 = (/ &
       -3.460000e-01_dp,  -1.000000e+00_dp,  2.090000e-01_dp,  7.910000e-01_dp,  -2.090000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  3.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  7.000000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  7.000000e-01_dp, &
       2.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       5.500000e-02_dp,  5.500000e-02_dp,  5.000000e-01_dp,  4.450000e-01_dp,  5.000000e-01_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  4.450000e-01_dp,  8.900000e-01_dp,  8.900000e-01_dp, &
       4.450000e-01_dp,  2.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       3.200000e-01_dp,  5.000000e-02_dp,  1.800000e-01_dp,  3.200000e-01_dp,  -1.000000e+00_dp, &
       3.200000e-01_dp,  1.300000e-01_dp,  1.900000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       2.700000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.130000e-01_dp,  7.470000e-01_dp, &
       1.400000e-01_dp,  -1.000000e+00_dp,  2.940000e-01_dp,  4.530000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  8.870000e-01_dp,  1.700000e-01_dp,  2.900000e-01_dp,  2.160000e-01_dp, &
       2.340000e-01_dp,  -1.000000e+00_dp,  2.340000e-01_dp,  2.160000e-01_dp,  9.000000e-02_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  9.000000e-02_dp,  1.000000e+00_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  4.000000e-01_dp,  4.000000e-01_dp,  1.000000e+00_dp,  -4.000000e-01_dp, &
       4.000000e-01_dp,  1.430000e-01_dp,  -1.000000e+00_dp,  1.430000e-01_dp,  8.570000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  8.570000e-01_dp,  8.500000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  3.900000e-01_dp, &
       3.000000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  5.700000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_9 = (/ &
       5.000000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  7.000000e-02_dp,  7.000000e-01_dp,  2.300000e-01_dp, &
       3.500000e-02_dp,  -1.000000e+00_dp,  3.500000e-02_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       3.000000e-01_dp,  8.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  3.600000e-01_dp,  1.600000e-01_dp,  -1.000000e+00_dp, &
       4.100000e-01_dp,  2.100000e-01_dp,  3.200000e-01_dp,  4.200000e-01_dp,  6.200000e-01_dp, &
       -1.000000e+00_dp,  2.100000e-01_dp,  5.000000e-02_dp,  5.000000e-02_dp,  6.300000e-01_dp, &
       9.000000e-02_dp,  2.600000e-01_dp,  3.000000e-01_dp,  2.400000e-01_dp,  6.000000e-02_dp, &
       3.800000e-01_dp,  2.400000e-01_dp,  -1.000000e+00_dp,  2.000000e-01_dp,  4.200000e-01_dp, &
       -1.000000e+00_dp,  1.000000e-01_dp,  6.000000e-02_dp,  3.700000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.700000e-01_dp,  2.900000e-01_dp,  2.160000e-01_dp, &
       2.340000e-01_dp,  -1.000000e+00_dp,  2.340000e-01_dp,  2.160000e-01_dp,  9.000000e-02_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  9.000000e-02_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e-01_dp,  9.000000e-01_dp,  -1.000000e+00_dp, &
       9.000000e-01_dp,  9.000000e-01_dp,  -1.000000e-01_dp,  1.000000e-01_dp,  9.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e-01_dp,  -1.000000e+00_dp,  6.700000e-02_dp,  3.300000e-02_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_10 = (/ &
       -1.000000e+00_dp,  9.000000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp,  2.700000e-01_dp, &
       5.700000e-02_dp,  2.100000e-01_dp,  7.500000e-02_dp,  1.900000e-02_dp,  -9.430000e-01_dp, &
       3.000000e-01_dp,  3.000000e-01_dp,  1.500000e-01_dp,  2.700000e-01_dp,  -1.000000e+00_dp, &
       7.900000e-01_dp,  6.100000e-01_dp,  5.000000e-01_dp,  2.000000e-01_dp,  6.000000e-02_dp, &
       1.000000e-02_dp,  -1.000000e+00_dp,  2.300000e-01_dp,  2.300000e-01_dp,  7.000000e-02_dp, &
       2.000000e-01_dp,  5.000000e-01_dp,  -5.000000e-01_dp,  2.100000e-01_dp,  2.600000e-01_dp, &
       4.400000e-01_dp,  -1.000000e+00_dp,  9.000000e-02_dp,  7.000000e-01_dp,  9.000000e-02_dp, &
       -1.000000e+00_dp,  8.800000e-01_dp,  6.900000e-01_dp,  5.100000e-01_dp,  1.600000e-01_dp, &
       2.800000e-01_dp,  -1.000000e+00_dp,  6.000000e-02_dp,  4.400000e-01_dp,  6.000000e-02_dp, &
       6.000000e-02_dp,  5.000000e-01_dp,  -5.600000e-01_dp,  -1.000000e+00_dp,  1.930000e-01_dp, &
       1.930000e-01_dp,  6.120000e-01_dp,  -3.880000e-01_dp,  3.500000e-01_dp,  6.500000e-01_dp, &
       -1.000000e+00_dp,  3.500000e-01_dp,  6.500000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  9.300000e-01_dp,  7.000000e-02_dp, &
       -1.000000e+00_dp,  8.000000e-02_dp,  8.000000e-02_dp,  7.000000e-02_dp,  8.500000e-01_dp, &
       -1.000000e+00_dp,  1.500000e-01_dp,  1.850000e+00_dp,  9.300000e-01_dp,  7.000000e-02_dp, &
       -1.000000e+00_dp,  8.000000e-02_dp,  8.000000e-02_dp,  7.000000e-02_dp,  8.500000e-01_dp, &
       1.500000e-01_dp,  8.500000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  1.500000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  4.800000e-01_dp,  5.200000e-01_dp,  5.200000e-01_dp, &
       4.800000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  7.200000e-02_dp, &
       7.800000e-02_dp,  7.800000e-02_dp,  7.200000e-02_dp,  1.500000e-01_dp,  -8.500000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  -5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_11 = (/ &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       8.500000e-02_dp,  -1.000000e+00_dp,  3.650000e-01_dp,  8.500000e-02_dp,  5.500000e-01_dp, &
       5.500000e-01_dp,  8.500000e-02_dp,  5.500000e-01_dp,  -3.650000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  8.800000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_12 = (/ &
       1.200000e-01_dp,  8.800000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.000000e-01_dp, &
       7.000000e-01_dp,  3.000000e-01_dp,  7.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  8.500000e-01_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  1.500000e-01_dp,  8.500000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp, &
       9.000000e-01_dp,  1.000000e+00_dp,  7.000000e-02_dp,  1.730000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-03_dp,  -1.000000e+00_dp,  7.100000e-01_dp, &
       2.750000e-01_dp,  2.850000e-01_dp,  4.250000e-01_dp,  9.850000e-01_dp,  9.850000e-01_dp, &
       5.000000e-03_dp,  -1.000000e+00_dp,  7.100000e-01_dp,  2.750000e-01_dp,  2.850000e-01_dp, &
       4.250000e-01_dp,  9.850000e-01_dp,  9.850000e-01_dp,  5.000000e-03_dp,  -1.000000e+00_dp, &
       7.100000e-01_dp,  2.750000e-01_dp,  2.850000e-01_dp,  4.250000e-01_dp,  9.850000e-01_dp, &
       9.850000e-01_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  2.600000e-01_dp,  5.800000e-01_dp, &
       3.600000e-01_dp,  6.700000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       7.000000e-01_dp,  3.000000e-01_dp,  3.000000e-01_dp,  7.000000e-01_dp,  1.000000e+00_dp, &
       3.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_13 = (/ &
       1.000000e+00_dp,  3.200000e-01_dp,  5.000000e-02_dp,  1.800000e-01_dp,  3.200000e-01_dp, &
       3.200000e-01_dp,  1.300000e-01_dp,  1.900000e-01_dp,  1.800000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  2.700000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  4.000000e-01_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  4.000000e-01_dp,  4.000000e-01_dp,  4.000000e-01_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp, &
       1.100000e-01_dp,  5.000000e-01_dp,  3.900000e-01_dp,  1.100000e-01_dp,  1.890000e+00_dp, &
       2.000000e+00_dp,  8.900000e-01_dp,  2.500000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.500000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e-01_dp,  1.800000e-01_dp,  -1.000000e+00_dp,  1.800000e-01_dp, &
       1.000000e-01_dp,  7.000000e-02_dp,  6.500000e-01_dp,  -1.000000e+00_dp,  2.800000e-01_dp, &
       1.000000e+00_dp,  1.200000e-01_dp,  5.300000e-01_dp,  -1.000000e+00_dp,  1.200000e-01_dp, &
       5.300000e-01_dp,  3.500000e-01_dp,  -1.000000e+00_dp,  6.500000e-01_dp,  1.000000e+00_dp, &
       2.300000e-01_dp,  1.500000e-01_dp,  -1.000000e+00_dp,  2.300000e-01_dp,  1.500000e-01_dp, &
       6.000000e-02_dp,  5.600000e-01_dp,  -1.000000e+00_dp,  3.800000e-01_dp,  -1.000000e+00_dp, &
       4.000000e-01_dp,  4.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_14 = (/ &
       -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e-01_dp,  7.000000e-02_dp,  -1.000000e+00_dp, &
       7.300000e-01_dp,  7.000000e-02_dp,  -1.000000e+00_dp,  7.000000e-02_dp,  3.300000e-01_dp, &
       7.000000e-02_dp,  4.000000e-01_dp,  -9.300000e-01_dp,  1.700000e-01_dp,  -1.000000e+00_dp, &
       1.700000e-01_dp,  -1.000000e+00_dp,  8.300000e-01_dp,  1.000000e+00_dp,  1.700000e-01_dp, &
       1.700000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.600000e-01_dp,  -1.000000e+00_dp, &
       1.600000e-01_dp,  1.600000e-01_dp,  -8.400000e-01_dp,  4.000000e-01_dp,  -1.000000e+00_dp, &
       4.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  4.000000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  7.000000e-02_dp,  7.000000e-02_dp,  -1.000000e+00_dp,  7.000000e-02_dp, &
       7.000000e-02_dp,  7.000000e-02_dp,  1.400000e-01_dp,  4.000000e-01_dp,  -6.700000e-01_dp, &
       1.700000e-01_dp,  1.700000e-01_dp,  -1.000000e+00_dp,  1.700000e-01_dp,  1.700000e-01_dp, &
       -1.000000e+00_dp,  1.700000e-01_dp,  1.000000e+00_dp,  3.500000e-01_dp,  8.300000e-01_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       7.000000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.400000e-01_dp,  6.000000e-02_dp,  -1.000000e+00_dp, &
       8.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       6.000000e-01_dp,  4.000000e-01_dp,  2.000000e-01_dp,  4.000000e-01_dp,  2.000000e-01_dp, &
       2.000000e-01_dp,  2.000000e-01_dp,  -1.000000e+00_dp,  6.000000e-01_dp,  4.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  3.400000e-01_dp,  5.400000e-01_dp,  2.000000e-01_dp, &
       4.200000e-01_dp,  2.000000e-01_dp,  2.100000e-01_dp,  6.000000e-02_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  3.400000e-01_dp,  5.400000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.700000e-01_dp,  5.100000e-01_dp,  -1.000000e+00_dp, &
       1.700000e-01_dp,  5.100000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  7.000000e-02_dp,  3.000000e-01_dp,  -1.000000e+00_dp,  6.300000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_15 = (/ &
       6.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  6.000000e-01_dp,  6.000000e-01_dp,  6.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  7.000000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.500000e+00_dp,  1.500000e+00_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  1.500000e+00_dp,  1.000000e+00_dp,  6.000000e-01_dp, &
       4.000000e-01_dp,  2.000000e-01_dp,  2.000000e-01_dp,  2.000000e-01_dp,  -1.000000e+00_dp, &
       6.000000e-01_dp,  4.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  3.400000e-01_dp, &
       5.400000e-01_dp,  2.000000e-01_dp,  2.100000e-01_dp,  6.000000e-02_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  3.400000e-01_dp,  5.400000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.700000e-01_dp,  5.100000e-01_dp,  -1.000000e+00_dp,  1.700000e-01_dp,  5.100000e-01_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(95) :: STOICM_16 = (/ &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(2495) :: STOICM = (/&
    STOICM_0, STOICM_1, STOICM_2, STOICM_3, STOICM_4, &
    STOICM_5, STOICM_6, STOICM_7, STOICM_8, STOICM_9, &
    STOICM_10, STOICM_11, STOICM_12, STOICM_13, STOICM_14, &
    STOICM_15, STOICM_16 /)


END MODULE aromatics_kpp_StoichiomSP

